f = If(x > 0.0, x^(2.0), sqrt(1.0 - x))
Δεξιά = 0.78 (slider from 0 to 1, step 0.0010)
Αριστερή = -1.08 (slider from -1.5 to 0, step 0.0010)
A: (Δεξιά, 0.0)
B: (Αριστερή, 0.0)
a = OrthogonalLine(B, xAxis)
b = OrthogonalLine(A, xAxis)
Α = Intersect(f, a, (-1.08, 1.4422205101855958))
Δ = Intersect(f, b, (0.78, 0.6084))
c = OrthogonalLine(Α, yAxis)
d = OrthogonalLine(Δ, yAxis)
E = Intersect(c, yAxis)
F = Intersect(d, yAxis)
e = Segment(Α, E)
g = Segment(Δ, F)
h = Segment(Α, B)
i = Segment(Δ, A)
G = (0, 1)